0 REM << CD43-1 >>
1 REM ==================================
2 REM    COMMODARES PROBLEM #39-1 :
3 PRINT"[147]   [197]XPONENTIAL [208]OWER"
4 REM    SOLUTION BY
5 REM    SCOTT DUNCAN, LON OLSON, AND
6 REM    ELLIS HORMATS
7 REM ==================================
10 PRINT"EVALUATE N TERMS OF SERIES APPROXIMATION FOR EXP(X)"
20 INPUT "INPUT X,N";X,N
30 T=1 : E=1
40 FOR Z=1 TO N
50 T=T/Z*X : E=E+T
60 NEXT Z
70 PRINT "E ^";X;"IS APPROXIMATELY "E
80 PRINT " WITH AN ACCURACY OF" 100*(1-T*X/Z);"%"